(Footnote-insert-footnote): Fix the search of the last footnote when
authorMichaël Cadilhac <michael.cadilhac@lrde.org>
Tue, 26 Dec 2006 20:27:12 +0000 (20:27 +0000)
committerMichaël Cadilhac <michael.cadilhac@lrde.org>
Tue, 26 Dec 2006 20:27:12 +0000 (20:27 +0000)
`footnote-spaced-footnotes' is nil.

lisp/mail/footnote.el

index da7e5fcf579942b8c4d393eb149fbc99b459cac6..b237449002646723b3dd5948528dc598278f5505 100644 (file)
@@ -501,7 +501,8 @@ styles."
                                 (regexp-quote footnote-end-tag)))
                       nil t)
                  (unless (beginning-of-line) t))
-               (goto-char (point-max)))))
+               (Footnote-goto-char-point-max)
+               (re-search-backward (concat "^" footnote-section-tag-regexp) nil t))))
     (unless (looking-at "^$")
       (insert "\n"))
     (when (eobp)